home *** CD-ROM | disk | FTP | other *** search
INSTALL Professional project | 1996-06-09 | 9.8 KB | 256 lines |
- /*
- * INSTALL.DAT
- * Project: PC Secretary
- * Version: 1.01
- */
-
- @DefineProject
- @Name = "PC Secretary"
- @Version = "1.01"
-
- @Subdir = "\\PCSEC"
- @OutDrive = Z
- @EndProject
-
- @DefineVars
- @Qstring @PkgType = "BOX"
- @Integer @Blue = @RGB(0,0,255) //DEFINE COLOR BLUE
- @Integer @Black = @RGB(0,0,0) //DEFINE COLOR BLACK
-
- @EndVars
-
-
- @BackgroundMode(3,@Blue,@Black)
- @Display
- @Cls
-
- Congratulations on your purchase of @Name!
-
- This program will now install @Name
- to your hard disk drive and verify the integrity
- of the CD-ROM disk. You may press the [Esc] key
- at any time to abort the installation.
-
-
- @Pause
- @EndDisplay
- @PkgType = @GetINI("COSMI CDSETUP", "PkgMethod")
- @GetOutDrive
- @Cls
- Select the HARD disk drive on which you wish to install your
- new copy of @Name.
- ie. "Drive C:"
-
-
-
-
-
-
- @Suppress(0, 1)
- Use the [CURSOR] to highlight a drive letter. Press [ENTER]
- to select that drive.
- @EndOutDrive
-
- @GetSubdir
- @Cls
- INSTALL is now suggesting a name for a program destination subdirectory
- to which files will be copied. Press [ENTER] to use @OutDrive:@SubDir,
- or type "\" and a "path", where "path" is the subdirectory you want INSTALL
- to use.
-
-
-
- @Prompt = "Which subdirectory ([Enter] = @Subdir) ?"
- @EndSubdir
-
- @DefineVars
- @Qstring @Item1 = "@OutDrive:\\@Subdir\\pcsect.exe, @Name,
- @OutDrive:\\@Subdir\\pcsect.exe"
- @Qstring @Item2 = "@OutDrive:\\@Subdir\\pcsect.hlp, @Name Help,
- @OutDrive:\\@Subdir\\pcsect.hlp"
- @Qstring @Item3 = "@OutDrive:\\@Subdir\\pcseman.wri, @Name Manual,
- @OutDrive:\\@Subdir\\pcseman.wri"
- @Qstring @Item4 = "@OutDrive:\\@Subdir\\spacegrd.wri, Space Guard Manual,
- @OutDrive:\\@Subdir\\spacegrd.wri"
- @Qstring @Item5 = "@OutDrive:\\@Subdir\\spacegrd.exe, Space Guard,
- @OutDrive:\\@Subdir\\spacegrd.exe"
- @Qstring @Item6 = "@OutDrive:\\@Subdir\\spacegrd.hlp, Space Guard Help,
- @OutDrive:\\@Subdir\\spacegrd.hlp"
- @EndVars
-
- @DefineDisk
- @Label = "PCSEC Disk #1"
- @BeginLib 773.001
- @F MSAJT200.EXE @S 515569 @O MSAJT200.EXE
- @F PCSECT.EXE @S 534135 @O PCSECT.EXE
- @F README.TXT @S 964 @O README.TXT
- @F PCSECT.HLP @S 200185 @O PCSECT.HLP
- @F INSTALL.LOG @S 248 @O INSTALL.LOG
- @F CALLADDR.DLL @S 1280 @O CALLADDR.DLL
- @F COMMDLG.DLL @S 89248 @O COMMDLG.DLL
- @F CTL3DV2.DLL @S 25808 @O CTL3DV2.DLL
- @F DDEML.DLL @S 39424 @O DDEML.DLL
- @F MSAES110.DLL @S 33280 @O MSAES110.DLL
- @F MSAFINX.DLL @S 31744 @O MSAFINX.DLL
- @F MSAJT112.DLL @S 17440 @O MSAJT112.DLL
- @F PORIENT.DLL @S 10384 @O PORIENT.DLL
- @F VBDB300.DLL @S 95200 @O VBDB300.DLL
- @F VBRUN300.DLL @S 398416 @O VBRUN300.DLL
- @F VER.DLL @S 9696 @O VER.DLL
- @F CMDIALOG.VBX @S 18688 @O CMDIALOG.VBX
- @F MSGHOOK.VBX @S 7648 @O @WindowsDrive:\\@WindowsDir\\SYSTEM\\MSGHOOK.VBX
- @F TOOLBUTN.VBX @S 43008 @O @WindowsDrive:\\@WindowsDir\\SYSTEM\\TOOLBUTN.VBX
- @F TOOLBUTT.VBX @S 12720 @O @WindowsDrive:\\@WindowsDir\\SYSTEM\\TOOLBUTT.VBX
- @EndLib
- // copy dlls to the system dir only if dated later than current dlls
-
- @If( @FileDate("@OutDrive:\\@Subdir\\CALLADDR.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\CALLADDR.DLL") )
- //COMMDLG.DLL is used extensively by windows - copYing this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\CALLADDR.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\CALLADDR.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\COMMDLG.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\COMMDLG.DLL") )
- //COMMDLG.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\COMMDLG.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\COMMDLG.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\CTL3DV2.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\CTL3DV2.DLL") )
- //CTL3DV2.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\CTL3DV2.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\CTL3DV2.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\DDEML.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\DDEML.DLL") )
- //DDEML.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\DDEML.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\DDEML.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\MSAES110.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\MSAES110.DLL") )
- //MSAES110.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\MSAES110.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\MSAES110.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\MSAFINX.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\MSAFINX.DLL") )
- //MSAFINX.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\MSAFINX.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\MSAFINX.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\MSAJT112.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\MSAJT112.DLL") )
- //MSAJT112.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\MSAJT112.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\MSAJT112.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\PORIENT.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\PORIENT.DLL") )
- //PORIENT.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\PORIENT.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\PORIENT.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\VBDB300.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\VBDB300.DLL") )
- //VBDB300.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\VBDB300.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\VBDB300.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\VBRUN300.DLL")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\VBRUN300.DLL") )
- //VBRUN300.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\VBRUN300.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\VBRUN300.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\ver.dll")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\VER.DLL") )
- //VER.DLL is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\VER.DLL", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\VER.DLL")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\CMDIALOG.VBX")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\CMDIALOG.VBX") )
- //CMDIALOG.VBX is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\CMDIALOG.VBX", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\CMDIALOG.VBX")
- @EndIf
- /*
- @If( @FileDate("@OutDrive:\\@Subdir\\MSGHOOK.VXB")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\MSGHOOK.VXB") )
- //MSGHOOK.VXB is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\MSGHOOK.VXB", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\MSGHOOK.VXB")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\TOOLBUTN.VBX")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\TOOLBUTN.VBX") )
- //TOOLBUTN.VBX is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\TOOLBUTN.VBX", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\TOOLBUTN.VBX")
- @EndIf
-
- @If( @FileDate("@OutDrive:\\@Subdir\\TOOLBUTT.VXB")
- > @FileDate("@WindowsDrive:\\@WindowsDir\\SYSTEM\\TOOLBUTT.VXB") )
- //TOOLBUTT.VXB is used extensively by windows - copying this could cause probs if already in use
- @Copy("@OutDrive:\\@Subdir\\TOOLBUTT.VXB", "@WindowsDrive:\\@WindowsDir\\SYSTEM\\TOOLBUTT.VXB")
- @EndIf
- */
- @EndDisk
-
- @Finish
- @Copy("pcseman.wri", "@OutDrive:\\@Subdir\\*.*")
- @If("@PkgType" == "JEWEL")
- @Copy("spacegrd.*", "@OutDrive:\\@Subdir\\*.*")
- @Copy("sgsnd*.*", "@OutDrive:\\@Subdir\\*.*")
-
- @ProgramManager("[CreateGroup(COSMI @Name)]
- [AddItem(@Item1, 0)][AddItem(@Item2, 0)]
- [AddItem(@Item3, 0)][AddItem(@Item4, 0)]
- [AddItem(@Item5, 0)][AddItem(@Item6, 0)]")
- /*===================================================================
- Change to the game dir and run (Spawn) the self extracting game file
- ====================================================================*/
- @Else
- @Copy("spacegrd.*", "@OutDrive:\\@Subdir\\*.*")
- @Copy("sgsnd*.*", "@OutDrive:\\@Subdir\\*.*")
-
- @ProgramManager("[CreateGroup(COSMI @Name)]
- [AddItem(@Item1, 0)][AddItem(@Item2, 0)]
- [AddItem(@Item3, 0)][AddItem(@Item4, 0)]
- [AddItem(@Item5, 0)][AddItem(@Item6, 0)]")
- @EndIf
- @ChDrive @OutDrive
- @ChDir "@SubDir"
-
- @Delete("@OutDrive:\\@Subdir\\calladdr.dll")
- @Delete("@OutDrive:\\@Subdir\\commdlg.dll")
- @Delete("@OutDrive:\\@Subdir\\ctl3dv2.dll")
- @Delete("@OutDrive:\\@Subdir\\ddeml.dll")
- @Delete("@OutDrive:\\@Subdir\\msaes110.dll")
- @Delete("@OutDrive:\\@Subdir\\msafinx.dll")
- @Delete("@OutDrive:\\@Subdir\\msajt112.dll")
- @Delete("@OutDrive:\\@Subdir\\porient.dll")
- @Delete("@OutDrive:\\@Subdir\\vbdb300.dll")
- @Delete("@OutDrive:\\@Subdir\\vbrun300.dll")
- @Delete("@OutDrive:\\@Subdir\\ver.dll")
- @Delete("@OutDrive:\\@Subdir\\cmdialog.vbx")
- //@Delete("@OutDrive:\\@Subdir\\msghook.vbx")
- //@Delete("@OutDrive:\\@Subdir\\toolbutn.vbx")
- //@Delete("@OutDrive:\\@Subdir\\toolbutt.vbx")
-
- //delete files from cosmitmp.dir and remove that dir
- @Delete("@OutDrive:\\cosmitmp.dir\\*.*")
- @RmDir("@OutDrive:\\cosmitmp.dir")
-
- @Cls
- Installation of @Name is now finished.
- A New application group has been created titled COSMI.
-
-
-
- @Pause
- @WinExec("NOTEPAD.EXE @OutDrive:\\@Subdir\\readme.txt", 1, (-1))
- @EndFinish
-
-
- /* end-of-file */
-